﻿Public Class DatHangChiTietDT
    Private _ma As String
    Public Property Ma()
        Get
            Return _ma
        End Get
        Set(ByVal value)
            _ma = value
        End Set
    End Property

    Private _stt As Integer
    Public Property STT()
        Get
            Return _stt
        End Get
        Set(ByVal value)
            _stt = value
        End Set
    End Property

    Private _maLoai As Integer
    Public Property MaLoai()
        Get
            Return _maLoai
        End Get
        Set(ByVal value)
            _maLoai = value
        End Set
    End Property

    Private _soluong As Double
    Public Property SoLuong()
        Get
            Return _soluong
        End Get
        Set(ByVal value)
            _soluong = value
        End Set
    End Property

    Private _ghichu As String
    Public Property GhiChu()
        Get
            Return _ghichu
        End Get
        Set(ByVal value)
            _ghichu = value
        End Set
    End Property

    Private _thanhtien As Double
    Public Property ThanhTien()
        Get
            Return _thanhtien
        End Get
        Set(ByVal value)
            _thanhtien = value
        End Set
    End Property

    'Khoi tao, Update
    Public Sub New(ByVal ma As String, ByVal maloai As Integer, ByVal stt As Integer, ByVal soluong As Double, ByVal ghichu As String, ByVal thanhtien As Double)
        Me._ma = ma
        Me._maLoai = maloai
        Me._stt = stt
        Me._soluong = soluong
        Me._ghichu = ghichu
        Me._thanhtien = thanhtien
    End Sub

    'Xoa
    Public Sub New(ByVal ma As String, ByVal stt As Integer)
        Me._ma = ma
        Me._stt = stt
    End Sub
End Class
